MODULE params
    IMPLICIT NONE

    INTEGER (KIND=4), PARAMETER :: MXLYR = 5
    INTEGER (KIND=4), PARAMETER :: MXNZ  = 2000
    INTEGER (KIND=4), PARAMETER :: MXSEC = 74
    INTEGER (KIND=4), PARAMETER :: MXSOL = MXSEC+1
    INTEGER (KIND=4), PARAMETER :: MXN   = MXSOL*MXNZ
    INTEGER (KIND=4), PARAMETER :: MXSVP = 102
    INTEGER (KIND=4), PARAMETER :: MXTRK = 10000
END MODULE params
